home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Atari Forever 4
/
Atari Forever 4.zip
/
Atari Forever 4.iso
/
PD_THEMA
/
HARDDISK
/
HDORDNER
/
HDORDNEB.S
< prev
next >
Wrap
Text File
|
1998-03-14
|
1KB
|
53 lines
b_mifl: equ $7e9c
test: move #-1,-(a7)
move #11,-(a7)
trap #13
addq.l #4,sp
btst #3,d0
bne.L ende
start:
pea L103f8
move #38,-(sp)
trap #14
addq.l #6,sp
move.w #0,-(a7)
move.l #[sense-test+$100],d0
add.l #[mdend-mdspace],d0
move #0,-(a7)
move.l d0,-(a7)
move.w #$31,-(a7) ;Ptermres
trap #1 ;GEMDOS
L103F8: tst.b $fc0003
beq.s normtos
lea mifl,a0
move.l b_mifl,2(a0)
normtos:
mifl: lea $56fa,a2
lea sense,a0
move.w #$ff,d0
L10420: lea 66(a0),a1
move.l a1,(a0)
move.w #4,-2(a0)
move.l a1,a0
dbf d0,L10420
suba.w #66,a0
move.l 16(a2),(a0)
move.l #sense,16(a2)
rts
ende: clr -(sp)
trap #1
sense: equ *
even
data
mdspace:
blk.b $4200,0
mdend:equ *
even
ə